* src/alloc.c (purecopy): Use AUTO_STRING.

diff --git a/src/alloc.c b/src/alloc.c
index eaa92eeddcce34f3cef8140f94a90236508f520b..66dbde0fb0af1973b4143cab793b78642c9d8853 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -5427,7 +5427,7 @@ purecopy (Lisp_Object obj)
     }
   else
     {
-      Lisp_Object fmt = build_pure_c_string ("Don't know how to purify: %S");
+      AUTO_STRING (fmt, "Don't know how to purify: %S");
       Fsignal (Qerror, list1 (CALLN (Fformat, fmt, obj)));
     }